# 106.2.1 
str(mudas)
head(mudas)
boxplot(mudas$altura~mudas$substrato)
mudas$substrato
boxplot(mudas$altura~mudas$especie)